home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / basic / ubppmpqs.zip / ppmp.h < prev    next >
Text File  |  1992-05-24  |  3KB  |  141 lines
  1. ;ppmp.h ver2.0
  2.  
  3. ;    1991/92 by Yuji KIDA
  4.  
  5. FMR        equ    0
  6.  
  7. HigherPower    equ    4096    ;if p is larger than this then
  8.                 ;higer powers are not checked.
  9.                 ;used in mpqshd2p
  10. ansDword    equ    10    ;dword length of sieve answer
  11.  
  12.  
  13. maxprimes    equ    0f000h
  14. maxbufferbytes    equ    maxprimes/4
  15. maxbufferwords    equ    maxprimes/8
  16.  
  17. primeunitbytes    equ    16
  18.  
  19. mask16bit    equ    0000ffffh
  20. mask24bit    equ    00ffffffh
  21. deletedmark4B    equ    80000000h
  22.  
  23. ;pmodeworkadr    equ    00100000h
  24. pmodeworkadr    equ    00110000h
  25.  
  26. ;
  27. ; data area for each prime
  28. ;
  29. primeadr    equ    pmodeworkadr
  30.  
  31.   if FMR
  32. mainRAMover    equ    0c0000h
  33. primeadr2    equ    80000h    ;0c0000h-80000h >=4bytes*maxprimes
  34. primeseg2    equ    8000h    ;primeadr2/10h
  35.   else
  36. mainRAMover    equ    0a0000h
  37. primeadr2    equ    60000h    ;0a0000h-60000h >= 4bytes*maxprimes
  38. primeseg2    equ    6000h    ;primeadr2/10h
  39.   endif
  40. optionRAM    equ    mainRAMover-primeadr2    ;must be a multiple of
  41.                         ;primeunitbytes
  42.  
  43. ;
  44. ; sieve constants
  45. ;
  46. sieveRep    equ    8
  47. sieveRepLog    equ    3    ;= log of sieveRep
  48.  
  49. ;
  50. ; LPV constants
  51. ;
  52. QSORTCUTOFF    EQU    40
  53.  
  54. R1_BYTES    EQU    4
  55. R2_BYTES    EQU    4
  56. maxXbytes    EQU    80
  57.  
  58. COMBIMASK    EQU    80000000h
  59. MAXCOMBI    EQU    16
  60. COMBIUNITBYTES    EQU    MAXCOMBI*4
  61.  
  62. RAMUNITBYTES    EQU    12
  63. RAMUNITDWORDS    EQU    3    ;RAMUNITBYTES/4
  64.  
  65. ;
  66. ; Gauss constants
  67. ;
  68.  
  69. matrixunitsize    equ    00020h
  70. matrixunitmask    equ    0ffe0h
  71.  
  72. GaussAdr    equ    pmodeworkadr
  73.  
  74. ;
  75. ; real-protect common parameter area
  76. ;
  77.  
  78. _memoseg    equ    primeseg2-200h
  79. _memoadr    equ    _memoseg*10h
  80.  
  81. _result        equ    0+_memoadr
  82. _primes        equ    4+_memoadr
  83. _primesR    equ    4
  84. _primes1    equ    8+_memoadr
  85. _primes2    equ    0ch+_memoadr
  86. _primes3A    equ    10h+_memoadr
  87. _primes3B    equ    14h+_memoadr
  88. _primes4    equ    18h+_memoadr
  89.  
  90. _inilog        equ    20h+_memoadr
  91. _inilogR    equ    20h
  92. _cutlog        equ    24h+_memoadr
  93. _cutlogR    equ    24h
  94. _offset        equ    28h+_memoadr
  95. _sievewidth    equ    2ch+_memoadr
  96. _sievewidthR    equ    2ch
  97. _start        equ    30h+_memoadr
  98. _absQ        equ    34h+_memoadr
  99. _absQR        equ    34h
  100.  
  101. _sievetop    equ    40h+_memoadr    ;= pmodeworkadr
  102.                     ;+ maxprimes * primeunitbytes
  103. _sievetopR    equ    40h
  104. _sieveBsize    equ    44h+_memoadr    ;= sieveover - sievetop
  105. _sieveBsizeR    equ    44h
  106. _sieveConst    equ    48h+_memoadr    ;= sieveBsize - sievetop
  107. _sieveConstR    equ    48h
  108. _sieveover    equ    4ch+_memoadr
  109. _sieveoverR    equ    4ch
  110. _sieveXsize    equ    50h+_memoadr    ;= sieveBsize\sieveRep
  111. _sieveXsizeR    equ    50h
  112. _sieveWsize    equ    54h+_memoadr    ;= sieveBsize\2
  113. _sieveWsizeR    equ    54h
  114. _sieveDsize    equ    58h+_memoadr    ;= sieveBsize\4
  115. _sieveDsizer    equ    58h
  116.  
  117. _sortingtop    equ    60h+_memoadr
  118.  
  119. _D        equ    80h+_memoadr
  120. _DR        equ    80h
  121. _MIA2P        equ    0c0h+_memoadr
  122.  
  123. _bigpivot    equ    _D
  124.  
  125. _B        equ    0100h+_memoadr
  126. _BR        equ    0100h
  127.  
  128. _W        equ    0140h+_memoadr    ;also used by ISORT
  129. _WR        equ    0140h
  130.  
  131.         ;200h-2ffh are gdttbl
  132.  
  133. _gdttblseg    equ    _memoseg+20h
  134. _gdttbladr    equ    _gdttblseg*10h
  135.  
  136. ;
  137. ; sieve answer area
  138. ;
  139. sieveansarea    equ    _memoadr+300h
  140.  
  141.